Revista CD Expert 8/Revista CD Expert nº 08 CD1.iso/Utilitarios/Especiais/Hotdog 5.5/hotdog55install.exe/%MAINDIR%/HotDog5.exe/0/RCDATA/TFRMDOCPROPERTIES/TFRMDOCPROPERTIES.txt

Text File | 1999-04-29 | 10.1 KB | 423 lines

object frmDocProperties: TfrmDocProperties
  Left = 291
  Top = 212
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsDialog
  Caption = 'Document Properties'
  ClientHeight = 331
  ClientWidth = 425
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = True
  Position = poScreenCenter
  Scaled = False
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 295
    Width = 425
    Height = 36
    Align = alBottom
    TabOrder = 0
    object butCancel: TButton
      Left = 345
      Top = 6
      Width = 75
      Height = 25
      Cancel = True
      Caption = '&Cancel'
      ModalResult = 2
      TabOrder = 2
    end
    object butOK: TButton
      Left = 264
      Top = 6
      Width = 75
      Height = 25
      Caption = '&OK'
      Default = True
      ModalResult = 1
      TabOrder = 1
      OnClick = butOKClick
    end
    object btnHelp: TButton
      Left = 5
      Top = 6
      Width = 75
      Height = 25
      Caption = '&Help'
      TabOrder = 0
      OnClick = btnHelpClick
    end
  end
  object pageDoc: TPageControl
    Left = 0
    Top = 0
    Width = 425
    Height = 295
    ActivePage = tabBody
    Align = alClient
    TabOrder = 1
    object tabBody: TTabSheet
      Caption = 'Appearance'
      object Label1: TLabel
        Left = 9
        Top = 243
        Width = 41
        Height = 13
        Caption = '&Scheme:'
        FocusControl = cmbScheme
      end
      object Bevel1: TBevel
        Left = 2
        Top = 232
        Width = 413
        Height = 3
      end
      object GroupBox1: TGroupBox
        Left = 145
        Top = 4
        Width = 269
        Height = 113
        Caption = 'Background Properties'
        TabOrder = 0
        object Label9: TLabel
          Left = 132
          Top = 80
          Width = 82
          Height = 13
          Caption = 'Background color'
          Color = clBtnFace
          ParentColor = False
        end
        object spdImgFile: TSpeedButton
          Left = 241
          Top = 40
          Width = 22
          Height = 20
          OnClick = spdImgFileClick
        end
        object Label2: TLabel
          Left = 10
          Top = 21
          Width = 209
          Height = 15
          AutoSize = False
          Caption = 'Choose a background &image for your page.'
          FocusControl = txtImgFileName
          WordWrap = True
        end
        object txtImgFileName: TSausCombo
          Left = 8
          Top = 40
          Width = 233
          Height = 21
          HelpContext = 533
          ItemHeight = 13
          Items.Strings = (
            'C:\My Documents\Graphics Files\ALLTHREE.JPG'
            'C:\Windoze\DESKTOP\badlink.jpg')
          TabOrder = 0
          OnChange = txtImgFilenameChange
          OnExit = txtImgFileNameExit
          OnKeyUp = txtImgFileNameKeyUp
          PreventDuplicates = False
          MaxItems = 0
          MoveSelectedToTop = True
          Version = '1.05'
          RegPath = '\Software\Sausage\Hotdog\Config\Recent'
          RegValue = 'ImgFiles'
          RegStore = True
        end
        object pnlBack: TSausColourPicker
          Left = 6
          Top = 72
          Width = 113
          Height = 27
          HelpContext = 534
          Color = clSilver
          TabOrder = 1
          OnClick = pnlBackClick
          OnChange = pnlBackChange
          Version = '1.29'
          Warnings = False
        end
      end
      object GroupBox2: TGroupBox
        Left = 146
        Top = 116
        Width = 269
        Height = 112
        Caption = 'Text/Link Colors'
        TabOrder = 1
        object lblDocText: TLabel
          Left = 25
          Top = 14
          Width = 71
          Height = 13
          Caption = 'Document text'
          Color = clBtnFace
          ParentColor = False
        end
        object lblActive: TLabel
          Left = 174
          Top = 14
          Width = 48
          Height = 13
          Caption = 'Active link'
        end
        object lblVisited: TLabel
          Left = 172
          Top = 63
          Width = 49
          Height = 13
          Caption = 'Visited link'
        end
        object lblStandard: TLabel
          Left = 28
          Top = 64
          Width = 62
          Height = 13
          Caption = 'Standard link'
        end
        object pnlDoc: TSausColourPicker
          Left = 6
          Top = 28
          Width = 113
          Height = 27
          HelpContext = 535
          TabOrder = 0
          OnClick = pnlDocClick
          OnChange = pnlDocChange
          Version = '1.29'
          Warnings = False
        end
        object pnlStandard: TSausColourPicker
          Left = 6
          Top = 78
          Width = 113
          Height = 27
          HelpContext = 537
          TabOrder = 1
          OnClick = pnlStandardClick
          OnChange = pnlStandardChange
          Version = '1.29'
          Warnings = False
        end
        object pnlActive: TSausColourPicker
          Left = 148
          Top = 28
          Width = 113
          Height = 27
          HelpContext = 536
          TabOrder = 2
          OnClick = pnlActiveClick
          OnChange = pnlActiveChange
          Version = '1.29'
          Warnings = False
        end
        object pnlVisited: TSausColourPicker
          Left = 148
          Top = 76
          Width = 113
          Height = 27
          HelpContext = 538
          TabOrder = 3
          OnClick = pnlVisitedClick
          OnChange = pnlVisitedChange
          Version = '1.29'
          Warnings = False
        end
      end
      object cmbScheme: TComboBox
        Left = 54
        Top = 240
        Width = 200
        Height = 21
        HelpContext = 539
        Style = csDropDownList
        ItemHeight = 13
        TabOrder = 2
        OnChange = cmbSchemeChange
      end
      object butSave: TButton
        Left = 260
        Top = 239
        Width = 75
        Height = 25
        HelpContext = 540
        Caption = 'Sa&ve As'
        TabOrder = 3
        OnClick = butSaveClick
      end
      object butRemove: TButton
        Left = 340
        Top = 239
        Width = 75
        Height = 25
        HelpContext = 541
        Caption = '&Remove'
        TabOrder = 4
        OnClick = butRemoveClick
      end
      object Panel2: TPanel
        Left = 3
        Top = 9
        Width = 139
        Height = 219
        BevelInner = bvRaised
        BevelOuter = bvLowered
        TabOrder = 5
        object ctlHTML: TFrameRover
          Left = 2
          Top = 2
          Width = 135
          Height = 215
          NoSelect = False
          HistoryMaxCount = 0
          DefFontName = 'Times New Roman'
          DefPreFontName = 'Courier New'
          Align = alClient
          TabOrder = 0
          Visible = False
          WebActive = False
          UserAgent = 'MrKistic'#39's Wiggeda Wack Browser (Ver 0.1)'
          TimeOut = 0
        end
      end
    end
    object tabDownloads: TTabSheet
      Caption = 'Document Size'
      object Label8: TLabel
        Left = 10
        Top = 10
        Width = 399
        Height = 45
        AutoSize = False
        Caption =
          'To help you find a medium between the content of a Web page and ' +
          'its size, HotDog provides you with a constant update of the tota' +
          'l size of your Web page (Including Images).'
        WordWrap = True
      end
      object Label10: TLabel
        Left = 9
        Top = 56
        Width = 401
        Height = 47
        AutoSize = False
        Caption =
          'You can find the approximate download time of your Web page for ' +
          'visitors using different connection  speeds using the line conne' +
          'ction speed drop down menu below. Remember, most visitors will b' +
          'e using a 28.8K modem.'
        WordWrap = True
      end
      object GroupBox7: TGroupBox
        Left = 4
        Top = 106
        Width = 399
        Height = 153
        TabOrder = 0
        object Label7: TLabel
          Left = 74
          Top = 23
          Width = 123
          Height = 13
          Caption = 'Visitor connection speed :'
        end
        object Label5: TLabel
          Left = 45
          Top = 72
          Width = 156
          Height = 13
          Caption = 'Size of document (inc. images) : '
        end
        object lblTotalSize: TLabel
          Left = 215
          Top = 71
          Width = 56
          Height = 14
          AutoSize = False
          Caption = 'lblTotalSize'
        end
        object Label6: TLabel
          Left = 54
          Top = 123
          Width = 144
          Height = 13
          Caption = 'Time to download document : '
        end
        object lblDownTime: TLabel
          Left = 213
          Top = 123
          Width = 66
          Height = 14
          AutoSize = False
          Caption = 'lblDownTime'
        end
        object imgSize: TImage
          Left = 286
          Top = 64
          Width = 32
          Height = 32
          AutoSize = True
          Transparent = True
        end
        object imgSpeed: TImage
          Left = 286
          Top = 14
          Width = 32
          Height = 32
          AutoSize = True
          ParentShowHint = False
          ShowHint = False
          Transparent = True
        end
        object imgTime: TImage
          Left = 286
          Top = 114
          Width = 32
          Height = 32
          AutoSize = True
          Transparent = True
        end
        object cmbDownload: TComboBox
          Left = 213
          Top = 19
          Width = 56
          Height = 21
          HelpContext = 542
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            '9600'
            '14.4k'
            '28.8k'
            '33.6k'
            '56k'
            '112k'
            'T1'
            'T3')
          TabOrder = 0
          OnChange = cmbDownloadChange
        end
      end
    end
  end
  object timGo: TTimer
    Interval = 100
    OnTimer = timGoTimer
    Left = 367
    Top = 164
  end
end